inherited FCadastroChequePre: TFCadastroChequePre
  Left = 186
  Top = 115
  Caption = 'Cadastro Cheque Pr'#233'-datado'
  ClientHeight = 337
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Height = 337
    object Label1: TLabel [0]
      Left = 6
      Top = 39
      Width = 33
      Height = 13
      Caption = 'Codigo'
    end
    object DBText1: TDBText [1]
      Left = 6
      Top = 54
      Width = 65
      Height = 17
      DataField = 'CH_PRE_CODIGO'
      DataSource = DSChequePre
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel [2]
      Left = 6
      Top = 79
      Width = 31
      Height = 13
      Caption = 'Banco'
      FocusControl = DBEBanco
    end
    object Label4: TLabel [3]
      Left = 55
      Top = 79
      Width = 39
      Height = 13
      Caption = 'Ag'#234'ncia'
      FocusControl = DBEAgencia
    end
    object Label5: TLabel [4]
      Left = 114
      Top = 80
      Width = 37
      Height = 13
      Caption = 'Cheque'
      FocusControl = DBECheque
    end
    object Label6: TLabel [5]
      Left = 172
      Top = 78
      Width = 24
      Height = 13
      Caption = 'Valor'
      FocusControl = DBEValor
    end
    object Label7: TLabel [6]
      Left = 282
      Top = 78
      Width = 82
      Height = 13
      Caption = 'Data Vencimento'
    end
    object Label8: TLabel [7]
      Left = 6
      Top = 152
      Width = 41
      Height = 13
      Caption = 'Emitente'
      FocusControl = DBEEmitente
    end
    object Label9: TLabel [8]
      Left = 6
      Top = 188
      Width = 62
      Height = 13
      Caption = 'Respons'#225'vel'
      FocusControl = DBEResponsavel
    end
    object Label10: TLabel [9]
      Left = 6
      Top = 116
      Width = 40
      Height = 13
      Caption = 'Portador'
    end
    object Label11: TLabel [10]
      Left = 282
      Top = 117
      Width = 52
      Height = 13
      Caption = 'Data Baixa'
    end
    object Label12: TLabel [11]
      Left = 7
      Top = 225
      Width = 52
      Height = 13
      Caption = 'Devolu'#231#227'o'
      FocusControl = DBEDevolucao
    end
    object Label13: TLabel [12]
      Left = 7
      Top = 260
      Width = 19
      Height = 13
      Caption = 'Obs'
      FocusControl = DBEObs
    end
    object Label14: TLabel [13]
      Left = 81
      Top = 39
      Width = 71
      Height = 13
      Caption = 'Data Digita'#231#227'o'
    end
    inherited Panel3: TPanel
      Top = 298
      TabOrder = 15
      inherited BtnConsuta: TBitBtn
        OnClick = BtnConsutaClick
      end
      inherited DBNavigator1: TDBNavigator
        DataSource = DSChequePre
        Hints.Strings = ()
      end
    end
    object DBEBanco: TDBEdit
      Left = 6
      Top = 93
      Width = 43
      Height = 21
      CharCase = ecUpperCase
      DataField = 'CH_PRE_BANCO'
      DataSource = DSChequePre
      TabOrder = 4
      OnKeyPress = DBEBancoKeyPress
    end
    object DBEAgencia: TDBEdit
      Left = 55
      Top = 93
      Width = 56
      Height = 21
      CharCase = ecUpperCase
      DataField = 'CH_PRE_AGENCIA'
      DataSource = DSChequePre
      TabOrder = 5
      OnKeyPress = DBEBancoKeyPress
    end
    object DBECheque: TDBEdit
      Left = 114
      Top = 93
      Width = 50
      Height = 21
      CharCase = ecUpperCase
      DataField = 'CH_PRE_CHEQUE'
      DataSource = DSChequePre
      TabOrder = 6
    end
    object DBEValor: TDBEdit
      Left = 172
      Top = 93
      Width = 89
      Height = 21
      CharCase = ecUpperCase
      DataField = 'CH_PRE_VALOR'
      DataSource = DSChequePre
      TabOrder = 7
      OnEnter = DBEValorEnter
      OnExit = DBEValorExit
      OnKeyPress = DBEValorKeyPress
    end
    object DBEEmitente: TDBEdit
      Left = 6
      Top = 167
      Width = 432
      Height = 21
      CharCase = ecUpperCase
      DataField = 'CH_PRE_EMITENTE'
      DataSource = DSChequePre
      TabOrder = 11
    end
    object DBEResponsavel: TDBEdit
      Left = 6
      Top = 202
      Width = 432
      Height = 21
      CharCase = ecUpperCase
      DataField = 'CH_PRE_RESPONSAVEL'
      DataSource = DSChequePre
      TabOrder = 12
    end
    object DBLCBPOrtador: TDBLookupComboBox
      Left = 6
      Top = 130
      Width = 267
      Height = 21
      DataField = 'CH_PRE_PORTADOR'
      DataSource = DSChequePre
      KeyField = 'PORT_CODIGO'
      ListField = 'PORT_DESCRICAO'
      ListSource = DSPortador
      TabOrder = 9
      OnKeyDown = DBLCBPOrtadorKeyDown
    end
    object DBEDevolucao: TDBEdit
      Left = 7
      Top = 238
      Width = 432
      Height = 21
      CharCase = ecUpperCase
      DataField = 'CH_PRE_DEVOLUCAO'
      DataSource = DSChequePre
      TabOrder = 13
    end
    object DBEObs: TDBEdit
      Left = 7
      Top = 274
      Width = 432
      Height = 21
      CharCase = ecUpperCase
      DataField = 'CH_PRE_OBS'
      DataSource = DSChequePre
      TabOrder = 14
    end
    object DBDEDataVencimento: TDBDateEdit
      Left = 282
      Top = 93
      Width = 90
      Height = 21
      DataField = 'CH_PRE_VENCIMENTO'
      DataSource = DSChequePre
      NumGlyphs = 2
      TabOrder = 8
    end
    object DBDEDatabaixa: TDBDateEdit
      Left = 282
      Top = 130
      Width = 90
      Height = 21
      DataField = 'CH_PRE_DATABAIXA'
      DataSource = DSChequePre
      NumGlyphs = 2
      TabOrder = 10
    end
    object DBECpfCNPJ: TDBEdit
      Left = 282
      Top = 53
      Width = 112
      Height = 21
      DataField = 'CH_PRE_CPFCNPJ'
      DataSource = DSChequePre
      TabOrder = 3
    end
    object RGCPFCNPJ: TRadioGroup
      Left = 172
      Top = 38
      Width = 105
      Height = 35
      Columns = 2
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemIndex = 0
      Items.Strings = (
        'CPF'
        'CNPJ')
      ParentFont = False
      TabOrder = 2
      OnClick = RGCPFCNPJClick
    end
    object DBDEDataDigitacao: TDBDateEdit
      Left = 80
      Top = 53
      Width = 89
      Height = 21
      DataField = 'CH_PRE_DATADIGITACAO'
      DataSource = DSChequePre
      NumGlyphs = 2
      TabOrder = 1
    end
  end
  object QChequePre: TQuery
    AfterInsert = QChequePreAfterInsert
    AfterEdit = QChequePreAfterEdit
    BeforePost = QChequePreBeforePost
    AfterPost = QChequePreAfterPost
    AfterCancel = QChequePreAfterPost
    AfterDelete = QChequePreAfterPost
    DatabaseName = 'base'
    RequestLive = True
    SQL.Strings = (
      'Select * from ChequePre'
      'Order By CH_PRE_CODIGO')
    Left = 352
    Top = 176
  end
  object DSChequePre: TDataSource
    DataSet = QChequePre
    Left = 384
    Top = 176
  end
  object DSPortador: TDataSource
    DataSet = DMFinanceiro.Qportador
    Left = 144
    Top = 120
  end
end
